From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 1 Nov 2003 16:37:35 +0000 (+0000)
Subject: (rmail-summary-goto-msg): Don't call itself
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~25091
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=4734e72be72ad73314fb8f69032d314954740859;p=emacs.git

(rmail-summary-goto-msg): Don't call itself
recursively if the last message is deleted, thus avoiding an
infinite loop.
---

diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index cd8d7d67aa4..a49b47453d8 100644
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -1074,7 +1074,8 @@ If SKIP-RMAIL, don't do anything to the Rmail buffer."
       (if (< n 1)
 	  (progn (message "No preceding message")
 		 (setq n 1)))
-      (if (> n total)
+      (if (and (> n total)
+	       (> total 0))
 	  (progn (message "No following message")
 		 (goto-char (point-max))
 		 (rmail-summary-goto-msg nil nowarn skip-rmail)))